home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-04-24 | 6.6 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 2b ee 20 85 20 | c8 99 20 22 57 69 6d 70 |...+. . |.. "Wimp|
|00000010| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 3a f1 20 f6 24 |_CloseDo|wn":. .$|
|00000020| 3b 22 20 61 74 20 22 3b | 9e 3a e0 0d 00 14 37 c8 |;" at ";|.:....7.|
|00000030| 99 20 22 57 69 6d 70 5f | 49 6e 69 74 69 61 6c 69 |. "Wimp_|Initiali|
|00000040| 73 65 22 2c 32 30 30 2c | 26 34 42 35 33 34 31 35 |se",200,|&4B53415|
|00000050| 34 2c 22 56 61 63 75 75 | 6d 22 20 b8 20 2c 54 61 |4,"Vacuu|m" . ,Ta|
|00000060| 73 6b 0d 00 1e 04 0d 00 | 28 0e 4d 61 78 53 75 63 |sk......|(.MaxSuc|
|00000070| 6b 3d 35 30 0d 00 32 04 | 0d 00 3c 2b de 20 42 6c |k=50..2.|..<+. Bl|
|00000080| 6f 63 6b 20 26 31 32 30 | 30 2c 4d 65 6e 75 20 26 |ock &120|0,Menu &|
|00000090| 31 35 30 2c 54 65 6d 70 | 6c 61 74 65 25 20 26 31 |150,Temp|late% &1|
|000000a0| 32 30 30 0d 00 46 17 de | 20 50 69 78 65 6c 73 28 |200..F..| Pixels(|
|000000b0| 4d 61 78 53 75 63 6b 2c | 32 29 0d 00 50 0a 51 75 |MaxSuck,|2)..P.Qu|
|000000c0| 69 74 3d a3 0d 00 5a 28 | 53 75 63 6b 3d 32 30 3a |it=...Z(|Suck=20:|
|000000d0| 50 6f 77 65 72 25 3d a3 | 3a 53 69 7a 65 3d 31 3a |Power%=.|:Size=1:|
|000000e0| 44 72 77 3d 30 3a 53 74 | 65 70 3d 35 0d 00 64 0d |Drw=0:St|ep=5..d.|
|000000f0| f2 49 6e 69 74 56 61 72 | 73 0d 00 6e 11 49 63 6f |.InitVar|s..n.Ico|
|00000100| 6e 3d a4 49 63 6f 6e 62 | 61 72 0d 00 78 12 f2 4c |n=.Iconb|ar..x..L|
|00000110| 6f 61 64 54 65 6d 70 6c | 61 74 65 73 0d 00 82 04 |oadTempl|ates....|
|00000120| 0d 00 8c 17 ee 20 85 20 | f2 45 72 72 6f 72 20 3a |..... . |.Error :|
|00000130| 20 51 75 69 74 3d b9 0d | 00 96 18 f2 4f 70 65 6e | Quit=..|....Open|
|00000140| 57 69 6e 64 6f 77 28 4d | 61 69 6e 25 2c a3 29 0d |Window(M|ain%,.).|
|00000150| 00 a0 04 0d 00 aa 0d c8 | 95 20 ac 20 51 75 69 74 |........|. . Quit|
|00000160| 0d 00 b4 16 20 20 20 f2 | 50 6f 6c 6c 28 a4 50 6f |.... .|Poll(.Po|
|00000170| 6c 6c 28 30 29 29 0d 00 | be 05 ce 0d 00 c8 04 0d |ll(0))..|........|
|00000180| 00 d2 17 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |..... "W|imp_Clos|
|00000190| 65 44 6f 77 6e 22 0d 00 | dc 04 0d 00 e6 05 e0 0d |eDown"..|........|
|000001a0| 00 f0 04 0d 00 fa 0f dd | 20 f2 49 6e 69 74 56 61 |........| .InitVa|
|000001b0| 72 73 0d 01 04 19 20 20 | 20 20 e3 20 63 6c 72 3d |rs.... | . clr=|
|000001c0| 31 20 b8 20 4d 61 78 53 | 75 63 6b 0d 01 0e 31 20 |1 . MaxS|uck...1 |
|000001d0| 20 20 20 20 20 20 20 50 | 69 78 65 6c 73 28 63 6c | P|ixels(cl|
|000001e0| 72 2c 30 29 3d 2d 39 39 | 39 3a 50 69 78 65 6c 73 |r,0)=-99|9:Pixels|
|000001f0| 28 63 6c 72 2c 31 29 3d | 2d 39 39 39 0d 01 18 0d |(clr,1)=|-999....|
|00000200| 20 20 20 20 ed 20 63 6c | 72 0d 01 22 05 e1 0d 01 | . cl|r.."....|
|00000210| 2c 04 0d 01 36 0e dd 20 | a4 49 63 6f 6e 62 61 72 |,...6.. |.Iconbar|
|00000220| 0d 01 40 56 20 20 20 20 | 21 42 6c 6f 63 6b 3d 2d |..@V |!Block=-|
|00000230| 31 20 3a 20 42 6c 6f 63 | 6b 21 34 3d 30 20 3a 20 |1 : Bloc|k!4=0 : |
|00000240| 42 6c 6f 63 6b 21 38 3d | 30 20 3a 20 42 6c 6f 63 |Block!8=|0 : Bloc|
|00000250| 6b 21 31 32 3d 36 38 20 | 3a 20 42 6c 6f 63 6b 21 |k!12=68 |: Block!|
|00000260| 31 36 3d 36 38 20 3a 20 | 42 6c 6f 63 6b 21 32 30 |16=68 : |Block!20|
|00000270| 3d 26 33 31 30 32 0d 01 | 4a 17 20 20 20 20 44 61 |=&3102..|J. Da|
|00000280| 74 61 24 3d 22 21 56 61 | 63 75 75 6d 22 0d 01 54 |ta$="!Va|cuum"..T|
|00000290| 32 20 20 20 20 de 20 42 | 6c 6f 63 6b 21 32 34 20 |2 . B|lock!24 |
|000002a0| 28 a9 20 44 61 74 61 24 | 2b 31 29 20 3a 20 24 28 |(. Data$|+1) : $(|
|000002b0| 42 6c 6f 63 6b 21 32 34 | 29 3d 44 61 74 61 24 0d |Block!24|)=Data$.|
|000002c0| 01 5e 27 20 20 20 20 42 | 6c 6f 63 6b 21 32 38 3d |.^' B|lock!28=|
|000002d0| 31 20 3a 20 42 6c 6f 63 | 6b 21 33 32 3d a9 20 44 |1 : Bloc|k!32=. D|
|000002e0| 61 74 61 24 2b 31 0d 01 | 68 2a 20 20 20 20 c8 99 |ata$+1..|h* ..|
|000002f0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|00000300| 6e 22 2c 2c 42 6c 6f 63 | 6b 20 b8 20 49 63 6f 6e |n",,Bloc|k . Icon|
|00000310| 0d 01 72 09 3d 49 63 6f | 6e 0d 01 7c 04 0d 01 86 |..r.=Ico|n..|....|
|00000320| 0c dd 20 f2 45 72 72 6f | 72 0d 01 90 1d 20 20 20 |.. .Erro|r.... |
|00000330| 20 c8 99 20 22 57 69 6d | 70 5f 44 72 61 67 42 6f | .. "Wim|p_DragBo|
|00000340| 78 22 2c 2c 2d 31 0d 01 | 9a 32 20 20 20 20 21 42 |x",,-1..|.2 !B|
|00000350| 6c 6f 63 6b 3d 9f 20 3a | 20 24 28 42 6c 6f 63 6b |lock=. :| $(Block|
|00000360| 2b 34 29 3d f6 24 2b 22 | 20 61 74 20 6c 69 6e 65 |+4)=.$+"| at line|
|00000370| 20 22 2b c3 9e 2b bd 30 | 0d 01 a4 2e 20 20 20 20 | "+..+.0|.... |
|00000380| c8 99 20 22 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 |.. "Wimp|_ReportE|
|00000390| 72 72 6f 72 22 2c 42 6c | 6f 63 6b 2c 31 2c 22 56 |rror",Bl|ock,1,"V|
|000003a0| 61 63 75 75 6d 22 0d 01 | ae 05 e1 0d 01 b8 04 0d |acuum"..|........|
|000003b0| 01 c2 14 dd 20 f2 50 6f | 6c 6c 28 52 65 61 73 6f |.... .Po|ll(Reaso|
|000003c0| 6e 25 29 0d 01 cc 13 20 | 20 20 20 c8 97 20 6d 78 |n%).... | .. mx|
|000003d0| 2c 6d 79 2c 6d 7a 0d 01 | d6 1f 20 20 20 20 e7 20 |,my,mz..|.. . |
|000003e0| 50 6f 77 65 72 25 20 8c | 20 f2 53 75 63 6b 28 6d |Power% .| .Suck(m|
|000003f0| 78 2c 6d 79 29 0d 01 e0 | 14 20 20 20 20 c8 8e 20 |x,my)...|. .. |
|00000400| 52 65 61 73 6f 6e 25 20 | ca 0d 01 ea 2f f4 20 20 |Reason% |..../. |
|00000410| 20 20 20 20 20 20 57 48 | 45 4e 20 31 20 3a 20 50 | WH|EN 1 : P|
|00000420| 52 4f 43 52 65 64 72 61 | 77 57 69 6e 64 6f 77 28 |ROCRedra|wWindow(|
|00000430| 42 6c 6f 63 6b 21 30 29 | 0d 01 f4 32 f4 20 20 20 |Block!0)|...2. |
|00000440| 20 20 20 20 20 57 48 45 | 4e 20 32 20 3a 20 50 52 | WHE|N 2 : PR|
|00000450| 4f 43 4f 70 65 6e 57 69 | 6e 64 6f 77 28 42 6c 6f |OCOpenWi|ndow(Blo|
|00000460| 63 6b 21 30 2c 54 52 55 | 45 29 0d 01 fe 27 20 20 |ck!0,TRU|E)...' |
|00000470| 20 20 20 20 20 20 c9 20 | 33 20 3a 20 f2 43 6c 6f | . |3 : .Clo|
|00000480| 73 65 57 69 6e 64 6f 77 | 28 42 6c 6f 63 6b 21 30 |seWindow|(Block!0|
|00000490| 29 0d 02 08 25 20 20 20 | 20 20 20 20 20 c9 20 36 |)...% | . 6|
|000004a0| 20 3a 20 f2 42 75 74 74 | 6f 6e 43 6c 69 63 6b 28 | : .Butt|onClick(|
|000004b0| 42 6c 6f 63 6b 29 0d 02 | 12 24 20 20 20 20 20 20 |Block)..|.$ |
|000004c0| 20 20 c9 20 39 20 3a 20 | f2 4d 65 6e 75 53 65 6c | . 9 : |.MenuSel|
|000004d0| 65 63 74 28 42 6c 6f 63 | 6b 29 0d 02 1c 25 20 20 |ect(Bloc|k)...% |
|000004e0| 20 20 20 20 20 20 c9 20 | 31 37 2c 31 38 20 3a 20 | . |17,18 : |
|000004f0| f2 4d 65 73 73 61 67 65 | 28 42 6c 6f 63 6b 29 0d |.Message|(Block).|
|00000500| 02 26 09 20 20 20 20 cb | 0d 02 30 05 e1 0d 02 3a |.&. .|..0....:|
|00000510| 04 0d 02 44 17 dd 20 f2 | 4d 65 73 73 61 67 65 28 |...D.. .|Message(|
|00000520| 48 61 6e 64 6c 65 25 29 | 0d 02 4e 17 20 20 20 20 |Handle%)|..N. |
|00000530| c8 8e 20 48 61 6e 64 6c | 65 25 21 31 36 20 ca 0d |.. Handl|e%!16 ..|
|00000540| 02 58 1e 20 20 20 20 20 | 20 20 20 20 c9 20 30 20 |.X. | . 0 |
|00000550| 20 20 20 20 20 3a 20 51 | 75 69 74 3d b9 0d 02 62 | : Q|uit=...b|
|00000560| 09 20 20 20 20 cb 0d 02 | 6c 05 e1 0d 02 76 04 0d |. ...|l....v..|
|00000570| 02 80 18 dd 20 f2 4d 65 | 6e 75 53 65 6c 65 63 74 |.... .Me|nuSelect|
|00000580| 28 42 6c 6f 63 6b 29 0d | 02 8a 12 20 20 20 20 c8 |(Block).|... .|
|00000590| 8e 20 21 4d 65 6e 75 20 | ca 0d 02 94 21 20 20 20 |. !Menu |....! |
|000005a0| 20 20 20 20 20 c9 20 31 | 20 3a 20 f2 49 63 6f 6e | . 1| : .Icon|
|000005b0| 62 61 72 28 42 6c 6f 63 | 6b 29 0d 02 9e 09 20 20 |bar(Bloc|k).... |
|000005c0| 20 20 cb 0d 02 a8 05 e1 | 0d 02 b2 04 0d 02 bc 15 | ......|........|
|000005d0| dd 20 f2 49 63 6f 6e 62 | 61 72 28 42 6c 6f 63 6b |. .Iconb|ar(Block|
|000005e0| 29 0d 02 c6 13 20 20 20 | 20 c8 8e 20 21 42 6c 6f |).... | .. !Blo|
|000005f0| 63 6b 20 ca 0d 02 d0 27 | 20 20 20 20 20 20 20 20 |ck ....'| |
|00000600| 20 c9 20 31 20 3a 20 f2 | 4f 70 65 6e 57 69 6e 64 | . 1 : .|OpenWind|
|00000610| 6f 77 28 4d 61 69 6e 25 | 2c a3 29 0d 02 da 19 20 |ow(Main%|,.).... |
|00000620| 20 20 20 20 20 20 20 20 | c9 20 32 20 3a 20 51 75 | |. 2 : Qu|
|00000630| 69 74 3d b9 0d 02 e4 09 | 20 20 20 20 cb 0d 02 ee |it=.....| ....|
|00000640| 05 e1 0d 02 f8 04 0d 03 | 02 1b dd 20 f2 43 6c 6f |........|... .Clo|
|00000650| 73 65 57 69 6e 64 6f 77 | 28 48 61 6e 64 6c 65 25 |seWindow|(Handle%|
|00000660| 29 0d 03 0c 17 20 20 20 | 20 42 6c 6f 63 6b 21 30 |).... | Block!0|
|00000670| 3d 48 61 6e 64 6c 65 25 | 0d 03 16 25 20 20 20 20 |=Handle%|...% |
|00000680| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00000690| 6e 64 6f 77 22 2c 30 2c | 42 6c 6f 63 6b 0d 03 20 |ndow",0,|Block.. |
|000006a0| 05 e1 0d 03 2a 04 0d 03 | 34 10 dd 20 f2 43 6c 6f |....*...|4.. .Clo|
|000006b0| 73 65 4d 65 6e 75 0d 03 | 3e 1f 20 20 20 20 c8 99 |seMenu..|>. ..|
|000006c0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|000006d0| 75 22 2c 2d 31 0d 03 48 | 1f f4 20 20 20 20 50 52 |u",-1..H|.. PR|
|000006e0| 4f 43 43 6c 6f 73 65 57 | 69 6e 64 6f 77 28 49 6e |OCCloseW|indow(In|
|000006f0| 66 6f 25 29 0d 03 52 05 | e1 0d 03 5c 04 0d 03 66 |fo%)..R.|...\...f|
|00000700| 14 dd 20 f2 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |.. .Load|Template|
|00000710| 73 0d 03 70 38 20 20 20 | 20 c8 99 20 22 57 69 6d |s..p8 | .. "Wim|
|00000720| 70 5f 4f 70 65 6e 54 65 | 6d 70 6c 61 74 65 22 2c |p_OpenTe|mplate",|
|00000730| 2c 22 3c 56 61 63 75 75 | 6d 24 44 69 72 3e 2e 54 |,"<Vacuu|m$Dir>.T|
|00000740| 65 6d 70 6c 61 74 65 73 | 22 0d 03 7a 1d 20 20 20 |emplates|"..z. |
|00000750| 20 49 6e 66 6f 25 3d a4 | 77 69 6e 64 6f 77 28 22 | Info%=.|window("|
|00000760| 49 6e 66 6f 22 29 0d 03 | 84 1d 20 20 20 20 4d 61 |Info")..|.. Ma|
|00000770| 69 6e 25 3d a4 77 69 6e | 64 6f 77 28 22 4d 61 69 |in%=.win|dow("Mai|
|00000780| 6e 22 29 0d 03 8e 1f 20 | 20 20 20 c8 99 20 22 57 |n").... | .. "W|
|00000790| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|000007a0| 65 22 0d 03 98 05 e1 0d | 03 a2 04 0d 03 ac 11 dd |e"......|........|
|000007b0| 20 a4 77 69 6e 64 6f 77 | 28 61 24 29 0d 03 b6 23 | .window|(a$)...#|
|000007c0| 20 20 20 20 ea 20 65 6e | 64 25 3a 65 6e 64 25 3d | . en|d%:end%=|
|000007d0| 54 65 6d 70 6c 61 74 65 | 25 2b 26 31 32 30 30 0d |Template|%+&1200.|
|000007e0| 03 c0 50 20 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |..P .|. "Wimp_|
|000007f0| 4c 6f 61 64 54 65 6d 70 | 6c 61 74 65 22 2c 2c 42 |LoadTemp|late",,B|
|00000800| 6c 6f 63 6b 2c 54 65 6d | 70 6c 61 74 65 25 2c 65 |lock,Tem|plate%,e|
|00000810| 6e 64 25 2c 2d 31 2c 61 | 24 2c 30 20 b8 20 2c 2c |nd%,-1,a|$,0 . ,,|
|00000820| 54 65 6d 70 6c 61 74 65 | 25 2c 2c 2c 2c 63 25 0d |Template|%,,,,c%.|
|00000830| 03 ca 2a 20 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |..* .|. "Wimp_|
|00000840| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 42 |CreateWi|ndow",,B|
|00000850| 6c 6f 63 6b 20 b8 20 63 | 25 0d 03 d4 07 3d 63 25 |lock . c|%....=c%|
|00000860| 0d 03 de 04 0d 03 e8 19 | dd 20 f2 42 75 74 74 6f |........|. .Butto|
|00000870| 6e 43 6c 69 63 6b 28 42 | 6c 6f 63 6b 29 0d 03 f2 |nClick(B|lock)...|
|00000880| 3b 20 20 20 20 48 61 6e | 64 6c 65 25 3d 42 6c 6f |; Han|dle%=Blo|
|00000890| 63 6b 21 31 32 20 3a 20 | 49 63 6f 6e 25 3d 42 6c |ck!12 : |Icon%=Bl|
|000008a0| 6f 63 6b 21 31 36 20 3a | 20 42 75 74 74 6f 6e 25 |ock!16 :| Button%|
|000008b0| 3d 42 6c 6f 63 6b 21 38 | 0d 03 fc 17 20 20 20 20 |=Block!8|.... |
|000008c0| e7 20 42 75 74 74 6f 6e | 25 20 80 20 32 20 8c 0d |. Button|% . 2 ..|
|000008d0| 04 06 17 20 20 20 20 20 | 20 20 f2 4d 65 6e 75 28 |... | .Menu(|
|000008e0| 42 6c 6f 63 6b 29 0d 04 | 10 09 20 20 20 20 cc 0d |Block)..|.. ..|
|000008f0| 04 1a 26 20 20 20 20 20 | 20 20 e7 20 48 61 6e 64 |..& | . Hand|
|00000900| 6c 65 25 3d 2d 32 20 80 | 20 49 63 6f 6e 25 3d 49 |le%=-2 .| Icon%=I|
|00000910| 63 6f 6e 20 8c 0d 04 24 | 22 20 20 20 20 20 20 20 |con ...$|" |
|00000920| 20 20 20 f2 4f 70 65 6e | 57 69 6e 64 6f 77 28 4d | .Open|Window(M|
|00000930| 61 69 6e 25 2c a3 29 0d | 04 2e 0c 20 20 20 20 20 |ain%,.).|... |
|00000940| 20 20 cc 0d 04 38 18 20 | 20 20 20 20 20 20 20 20 | ...8. | |
|00000950| 20 c8 8e 20 49 63 6f 6e | 25 20 ca 0d 04 42 37 20 | .. Icon|% ...B7 |
|00000960| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 c9 20 | | . |
|00000970| 34 3a e7 20 50 6f 77 65 | 72 25 3d b9 20 8c 20 50 |4:. Powe|r%=. . P|
|00000980| 6f 77 65 72 25 3d a3 20 | 8b 20 50 6f 77 65 72 25 |ower%=. |. Power%|
|00000990| 3d b9 0d 04 4c 39 20 20 | 20 20 20 20 20 20 20 20 |=...L9 | |
|000009a0| 20 20 20 20 20 c9 20 31 | 3a e7 20 53 75 63 6b 3e | . 1|:. Suck>|
|000009b0| 31 20 8c 20 53 75 63 6b | 3d 53 75 63 6b 2d 31 3a |1 . Suck|=Suck-1:|
|000009c0| f2 55 70 64 61 74 65 53 | 75 63 6b 0d 04 56 3f 20 |.UpdateS|uck..V? |
|000009d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 c9 20 | | . |
|000009e0| 33 3a e7 20 53 75 63 6b | 3c 4d 61 78 53 75 63 6b |3:. Suck|<MaxSuck|
|000009f0| 20 8c 20 53 75 63 6b 3d | 53 75 63 6b 2b 31 3a f2 | . Suck=|Suck+1:.|
|00000a00| 55 70 64 61 74 65 53 75 | 63 6b 0d 04 60 1d 20 20 |UpdateSu|ck..`. |
|00000a10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 c9 20 35 | | . 5|
|00000a20| 3a 51 75 69 74 3d b9 0d | 04 6a 2a 20 20 20 20 20 |:Quit=..|.j* |
|00000a30| 20 20 20 20 20 20 20 20 | 20 20 c9 20 36 3a f2 43 | | . 6:.C|
|00000a40| 6c 6f 73 65 57 69 6e 64 | 6f 77 28 4d 61 69 6e 25 |loseWind|ow(Main%|
|00000a50| 29 0d 04 74 39 20 20 20 | 20 20 20 20 20 20 20 20 |)..t9 | |
|00000a60| 20 20 20 20 c9 20 38 3a | e7 20 53 69 7a 65 3e 31 | . 8:|. Size>1|
|00000a70| 20 8c 20 53 69 7a 65 3d | 53 69 7a 65 2d 31 3a f2 | . Size=|Size-1:.|
|00000a80| 55 70 64 61 74 65 53 75 | 63 6b 0d 04 7e 3a 20 20 |UpdateSu|ck..~: |
|00000a90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 c9 20 31 | | . 1|
|00000aa0| 30 3a e7 20 53 69 7a 65 | 3c 35 20 8c 20 53 69 7a |0:. Size|<5 . Siz|
|00000ab0| 65 3d 53 69 7a 65 2b 31 | 3a f2 55 70 64 61 74 65 |e=Size+1|:.Update|
|00000ac0| 53 75 63 6b 0d 04 88 0f | 20 20 20 20 20 20 20 20 |Suck....| |
|00000ad0| 20 20 cb 0d 04 92 0c 20 | 20 20 20 20 20 20 cd 0d | ..... | ..|
|00000ae0| 04 9c 09 20 20 20 20 cd | 0d 04 a6 05 e1 0d 04 b0 |... .|........|
|00000af0| 04 0d 04 ba 26 dd 20 f2 | 52 65 64 72 61 77 49 63 |....&. .|RedrawIc|
|00000b00| 6f 6e 28 48 61 6e 64 6c | 65 25 2c 49 63 6f 6e 25 |on(Handl|e%,Icon%|
|00000b10| 2c 74 65 78 74 24 29 0d | 04 c4 40 20 20 20 20 f2 |,text$).|..@ .|
|00000b20| 67 65 74 49 63 6f 6e 49 | 6e 66 6f 28 48 61 6e 64 |getIconI|nfo(Hand|
|00000b30| 6c 65 25 2c 49 63 6f 6e | 25 29 20 3a 20 f2 64 65 |le%,Icon|%) : .de|
|00000b40| 6c 65 74 65 49 63 6f 6e | 28 48 61 6e 64 6c 65 25 |leteIcon|(Handle%|
|00000b50| 2c 49 63 6f 6e 25 29 0d | 04 ce 40 20 20 20 20 69 |,Icon%).|..@ i|
|00000b60| 25 3d a4 63 72 65 61 74 | 65 49 63 6f 6e 28 48 61 |%=.creat|eIcon(Ha|
|00000b70| 6e 64 6c 65 25 2c 69 78 | 30 25 2c 69 79 30 25 2c |ndle%,ix|0%,iy0%,|
|00000b80| 69 78 31 25 2c 69 79 31 | 25 2c 66 6c 61 67 73 25 |ix1%,iy1|%,flags%|
|00000b90| 2c 74 65 78 74 24 29 0d | 04 d8 39 20 20 20 20 c8 |,text$).|..9 .|
|00000ba0| 99 20 22 57 69 6d 70 5f | 46 6f 72 63 65 52 65 64 |. "Wimp_|ForceRed|
|00000bb0| 72 61 77 22 2c 48 61 6e | 64 6c 65 25 2c 69 78 30 |raw",Han|dle%,ix0|
|00000bc0| 25 2c 69 79 30 25 2c 69 | 78 31 25 2c 69 79 31 25 |%,iy0%,i|x1%,iy1%|
|00000bd0| 0d 04 e2 05 e1 0d 04 ec | 04 0d 04 f6 20 dd 20 f2 |........|.... . .|
|00000be0| 64 65 6c 65 74 65 49 63 | 6f 6e 28 48 61 6e 64 6c |deleteIc|on(Handl|
|00000bf0| 65 25 2c 49 63 6f 6e 25 | 29 0d 05 00 27 20 20 20 |e%,Icon%|)...' |
|00000c00| 20 42 6c 6f 63 6b 21 30 | 3d 48 61 6e 64 6c 65 25 | Block!0|=Handle%|
|00000c10| 20 3a 20 42 6c 6f 63 6b | 21 34 3d 49 63 6f 6e 25 | : Block|!4=Icon%|
|00000c20| 0d 05 0a 23 20 20 20 20 | c8 99 20 22 57 69 6d 70 |...# |.. "Wimp|
|00000c30| 5f 44 65 6c 65 74 65 49 | 63 6f 6e 22 2c 2c 42 6c |_DeleteI|con",,Bl|
|00000c40| 6f 63 6b 0d 05 14 05 e1 | 0d 05 1e 04 0d 05 28 21 |ock.....|......(!|
|00000c50| dd 20 f2 67 65 74 49 63 | 6f 6e 49 6e 66 6f 28 48 |. .getIc|onInfo(H|
|00000c60| 61 6e 64 6c 65 25 2c 49 | 63 6f 6e 25 29 0d 05 32 |andle%,I|con%)..2|
|00000c70| 27 20 20 20 20 42 6c 6f | 63 6b 21 30 3d 48 61 6e |' Blo|ck!0=Han|
|00000c80| 64 6c 65 25 20 3a 20 42 | 6c 6f 63 6b 21 34 3d 49 |dle% : B|lock!4=I|
|00000c90| 63 6f 6e 25 0d 05 3c 25 | 20 20 20 20 c8 99 20 22 |con%..<%| .. "|
|00000ca0| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00000cb0| 65 22 2c 2c 42 6c 6f 63 | 6b 0d 05 46 44 20 20 20 |e",,Bloc|k..FD |
|00000cc0| 20 69 78 30 25 3d 42 6c | 6f 63 6b 21 38 20 3a 20 | ix0%=Bl|ock!8 : |
|00000cd0| 69 79 30 25 3d 42 6c 6f | 63 6b 21 31 32 20 3a 20 |iy0%=Blo|ck!12 : |
|00000ce0| 69 78 31 25 3d 42 6c 6f | 63 6b 21 31 36 20 3a 20 |ix1%=Blo|ck!16 : |
|00000cf0| 69 79 31 25 3d 42 6c 6f | 63 6b 21 32 30 0d 05 50 |iy1%=Blo|ck!20..P|
|00000d00| 17 20 20 20 20 66 6c 61 | 67 73 25 3d 42 6c 6f 63 |. fla|gs%=Bloc|
|00000d10| 6b 21 32 34 0d 05 5a 19 | 20 20 20 20 44 61 74 61 |k!24..Z.| Data|
|00000d20| 24 3d 24 28 42 6c 6f 63 | 6b 2b 32 38 29 0d 05 64 |$=$(Bloc|k+28)..d|
|00000d30| 05 e1 0d 05 6e 04 0d 05 | 78 3b dd 20 a4 63 72 65 |....n...|x;. .cre|
|00000d40| 61 74 65 49 63 6f 6e 28 | 48 61 6e 64 6c 65 25 2c |ateIcon(|Handle%,|
|00000d50| 69 78 30 25 2c 69 79 30 | 25 2c 69 78 31 25 2c 69 |ix0%,iy0|%,ix1%,i|
|00000d60| 79 31 25 2c 66 6c 61 67 | 73 25 2c 44 61 74 61 24 |y1%,flag|s%,Data$|
|00000d70| 29 0d 05 82 35 20 20 20 | 20 42 6c 6f 63 6b 21 30 |)...5 | Block!0|
|00000d80| 3d 48 61 6e 64 6c 65 25 | 20 3a 20 42 6c 6f 63 6b |=Handle%| : Block|
|00000d90| 21 34 3d 69 78 30 25 20 | 3a 20 42 6c 6f 63 6b 21 |!4=ix0% |: Block!|
|00000da0| 38 3d 69 79 30 25 0d 05 | 8c 37 20 20 20 20 42 6c |8=iy0%..|.7 Bl|
|00000db0| 6f 63 6b 21 31 32 3d 69 | 78 31 25 20 3a 20 42 6c |ock!12=i|x1% : Bl|
|00000dc0| 6f 63 6b 21 31 36 3d 69 | 79 31 25 20 3a 20 42 6c |ock!16=i|y1% : Bl|
|00000dd0| 6f 63 6b 21 32 30 3d 66 | 6c 61 67 73 25 0d 05 96 |ock!20=f|lags%...|
|00000de0| 19 20 20 20 20 24 28 42 | 6c 6f 63 6b 2b 32 34 29 |. $(B|lock+24)|
|00000df0| 3d 44 61 74 61 24 0d 05 | a0 2b 20 20 20 20 c8 99 |=Data$..|.+ ..|
|00000e00| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|00000e10| 6e 22 2c 2c 42 6c 6f 63 | 6b 20 b8 20 49 63 6f 6e |n",,Bloc|k . Icon|
|00000e20| 25 0d 05 aa 0a 3d 49 63 | 6f 6e 25 0d 05 b4 04 0d |%....=Ic|on%.....|
|00000e30| 05 be 11 dd 20 f2 55 70 | 64 61 74 65 53 75 63 6b |.... .Up|dateSuck|
|00000e40| 0d 05 c8 24 20 20 20 20 | f2 52 65 49 6e 69 74 49 |...$ |.ReInitI|
|00000e50| 63 6f 6e 28 4d 61 69 6e | 25 2c 32 2c c3 28 53 75 |con(Main|%,2,.(Su|
|00000e60| 63 6b 29 29 0d 05 d2 24 | 20 20 20 20 f2 52 65 64 |ck))...$| .Red|
|00000e70| 72 61 77 49 63 6f 6e 28 | 4d 61 69 6e 25 2c 32 2c |rawIcon(|Main%,2,|
|00000e80| c3 28 53 75 63 6b 29 29 | 0d 05 dc 24 20 20 20 20 |.(Suck))|...$ |
|00000e90| f2 52 65 49 6e 69 74 49 | 63 6f 6e 28 4d 61 69 6e |.ReInitI|con(Main|
|00000ea0| 25 2c 39 2c c3 28 53 69 | 7a 65 29 29 0d 05 e6 24 |%,9,.(Si|ze))...$|
|00000eb0| 20 20 20 20 f2 52 65 64 | 72 61 77 49 63 6f 6e 28 | .Red|rawIcon(|
|00000ec0| 4d 61 69 6e 25 2c 39 2c | c3 28 53 69 7a 65 29 29 |Main%,9,|.(Size))|
|00000ed0| 0d 05 f0 05 e1 0d 05 fa | 04 0d 06 04 20 dd 20 f2 |........|.... . .|
|00000ee0| 4f 70 65 6e 57 69 6e 64 | 6f 77 28 48 61 6e 64 6c |OpenWind|ow(Handl|
|00000ef0| 65 25 2c 66 75 6c 6c 25 | 29 0d 06 0e 17 20 20 20 |e%,full%|).... |
|00000f00| 20 42 6c 6f 63 6b 21 30 | 3d 48 61 6e 64 6c 65 25 | Block!0|=Handle%|
|00000f10| 0d 06 18 42 20 20 20 20 | e7 20 ac 20 66 75 6c 6c |...B |. . full|
|00000f20| 25 20 8c 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |% . .. "|Wimp_Get|
|00000f30| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 30 2c 42 |WindowSt|ate",0,B|
|00000f40| 6c 6f 63 6b 20 3a 20 42 | 6c 6f 63 6b 21 32 38 3d |lock : B|lock!28=|
|00000f50| 2d 31 0d 06 22 24 20 20 | 20 20 c8 99 20 22 57 69 |-1.."$ | .. "Wi|
|00000f60| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 30 |mp_OpenW|indow",0|
|00000f70| 2c 42 6c 6f 63 6b 0d 06 | 2c 25 20 20 20 20 e7 20 |,Block..|,% . |
|00000f80| 48 61 6e 64 6c 65 25 3d | 4d 61 69 6e 25 20 8c 20 |Handle%=|Main% . |
|00000f90| f2 55 70 64 61 74 65 53 | 75 63 6b 0d 06 36 05 e1 |.UpdateS|uck..6..|
|00000fa0| 0d 06 40 04 0d 06 4a 26 | dd 20 f2 52 65 49 6e 69 |..@...J&|. .ReIni|
|00000fb0| 74 49 63 6f 6e 28 48 61 | 6e 64 6c 65 25 2c 49 63 |tIcon(Ha|ndle%,Ic|
|00000fc0| 6f 6e 25 2c 74 65 78 74 | 24 29 0d 06 54 40 20 20 |on%,text|$)..T@ |
|00000fd0| 20 20 f2 67 65 74 49 63 | 6f 6e 49 6e 66 6f 28 48 | .getIc|onInfo(H|
|00000fe0| 61 6e 64 6c 65 25 2c 49 | 63 6f 6e 25 29 20 3a 20 |andle%,I|con%) : |
|00000ff0| f2 64 65 6c 65 74 65 49 | 63 6f 6e 28 48 61 6e 64 |.deleteI|con(Hand|
|00001000| 6c 65 25 2c 49 63 6f 6e | 25 29 0d 06 5e 40 20 20 |le%,Icon|%)..^@ |
|00001010| 20 20 69 25 3d a4 63 72 | 65 61 74 65 49 63 6f 6e | i%=.cr|eateIcon|
|00001020| 28 48 61 6e 64 6c 65 25 | 2c 69 78 30 25 2c 69 79 |(Handle%|,ix0%,iy|
|00001030| 30 25 2c 69 78 31 25 2c | 69 79 31 25 2c 66 6c 61 |0%,ix1%,|iy1%,fla|
|00001040| 67 73 25 2c 74 65 78 74 | 24 29 0d 06 68 05 e1 0d |gs%,text|$)..h...|
|00001050| 06 72 04 0d 06 7c 1c dd | 20 f2 52 65 64 72 61 77 |.r...|..| .Redraw|
|00001060| 57 69 6e 64 6f 77 28 48 | 61 6e 64 6c 65 25 29 0d |Window(H|andle%).|
|00001070| 06 86 21 20 20 20 20 ea | 20 6d 6f 72 65 25 20 3a |..! .| more% :|
|00001080| 20 42 6c 6f 63 6b 21 30 | 3d 48 61 6e 64 6c 65 25 | Block!0|=Handle%|
|00001090| 0d 06 90 2e 20 20 20 20 | c8 99 20 22 57 69 6d 70 |.... |.. "Wimp|
|000010a0| 5f 52 65 64 72 61 77 57 | 69 6e 64 6f 77 22 2c 30 |_RedrawW|indow",0|
|000010b0| 2c 42 6c 6f 63 6b 20 b8 | 20 6d 6f 72 65 25 0d 06 |,Block .| more%..|
|000010c0| 9a 21 20 20 20 20 78 30 | 25 3d 42 6c 6f 63 6b 21 |.! x0|%=Block!|
|000010d0| 34 20 3a 20 79 30 25 3d | 42 6c 6f 63 6b 21 38 0d |4 : y0%=|Block!8.|
|000010e0| 06 a4 10 20 20 20 20 c8 | 95 20 6d 6f 72 65 25 0d |... .|. more%.|
|000010f0| 06 ae 33 20 20 20 20 20 | 20 20 20 20 20 c8 99 20 |..3 | .. |
|00001100| 22 57 69 6d 70 5f 47 65 | 74 52 65 63 74 61 6e 67 |"Wimp_Ge|tRectang|
|00001110| 6c 65 22 2c 2c 42 6c 6f | 63 6b 20 b8 20 6d 6f 72 |le",,Blo|ck . mor|
|00001120| 65 25 0d 06 b8 09 20 20 | 20 20 ce 0d 06 c2 05 e1 |e%.... | ......|
|00001130| 0d 06 cc 04 0d 06 d6 12 | dd 20 f2 53 75 63 6b 28 |........|. .Suck(|
|00001140| 6d 78 2c 6d 79 29 0d 06 | e0 13 20 20 20 20 e3 20 |mx,my)..|.. . |
|00001150| 44 6f 3d 31 20 b8 20 32 | 30 0d 06 ea 15 20 20 20 |Do=1 . 2|0.... |
|00001160| 20 20 20 20 20 44 72 77 | 3d 44 72 77 2b 31 0d 06 | Drw|=Drw+1..|
|00001170| f4 23 20 20 20 20 20 20 | 20 20 e7 20 44 72 77 3d |.# | . Drw=|
|00001180| 4d 61 78 53 75 63 6b 2b | 31 20 8c 20 44 72 77 3d |MaxSuck+|1 . Drw=|
|00001190| 31 0d 06 fe 33 20 20 20 | 20 20 20 20 20 e7 20 50 |1...3 | . P|
|000011a0| 69 78 65 6c 73 28 44 72 | 77 2c 30 29 3d 2d 39 39 |ixels(Dr|w,0)=-99|
|000011b0| 39 20 8c 20 f2 41 64 64 | 4e 65 77 53 75 63 6b 28 |9 . .Add|NewSuck(|
|000011c0| 44 72 77 29 0d 07 08 20 | 20 20 20 20 20 20 20 20 |Drw)... | |
|000011d0| 63 70 6f 69 3d b0 6d 78 | 2b 61 64 78 2c 6d 79 2b |cpoi=.mx|+adx,my+|
|000011e0| 61 64 79 29 0d 07 12 3b | 20 20 20 20 20 20 20 20 |ady)...;| |
|000011f0| e7 20 50 69 78 65 6c 73 | 28 44 72 77 2c 32 29 3c |. Pixels|(Drw,2)<|
|00001200| 3e 30 20 8c 20 e6 20 50 | 69 78 65 6c 73 28 44 72 |>0 . . P|ixels(Dr|
|00001210| 77 2c 32 29 20 8b 20 e6 | 20 30 20 c8 9c 20 30 0d |w,2) . .| 0 .. 0.|
|00001220| 07 1c 37 20 20 20 20 20 | 20 20 20 c8 93 20 c8 90 |..7 | .. ..|
|00001230| 20 50 69 78 65 6c 73 28 | 44 72 77 2c 30 29 2c 50 | Pixels(|Drw,0),P|
|00001240| 69 78 65 6c 73 28 44 72 | 77 2c 31 29 2c 53 69 7a |ixels(Dr|w,1),Siz|
|00001250| 65 2c 53 69 7a 65 0d 07 | 26 64 20 20 20 20 20 20 |e,Size..|&d |
|00001260| 20 20 e7 20 50 69 78 65 | 6c 73 28 44 72 77 2c 30 | . Pixe|ls(Drw,0|
|00001270| 29 3e 6d 78 20 8c 20 50 | 69 78 65 6c 73 28 44 72 |)>mx . P|ixels(Dr|
|00001280| 77 2c 30 29 3d 50 69 78 | 65 6c 73 28 44 72 77 2c |w,0)=Pix|els(Drw,|
|00001290| 30 29 2d 53 74 65 70 20 | 8b 20 50 69 78 65 6c 73 |0)-Step |. Pixels|
|000012a0| 28 44 72 77 2c 30 29 3d | 50 69 78 65 6c 73 28 44 |(Drw,0)=|Pixels(D|
|000012b0| 72 77 2c 30 29 2b 53 74 | 65 70 0d 07 30 64 20 20 |rw,0)+St|ep..0d |
|000012c0| 20 20 20 20 20 20 e7 20 | 50 69 78 65 6c 73 28 44 | . |Pixels(D|
|000012d0| 72 77 2c 31 29 3e 6d 79 | 20 8c 20 50 69 78 65 6c |rw,1)>my| . Pixel|
|000012e0| 73 28 44 72 77 2c 31 29 | 3d 50 69 78 65 6c 73 28 |s(Drw,1)|=Pixels(|
|000012f0| 44 72 77 2c 31 29 2d 53 | 74 65 70 20 8b 20 50 69 |Drw,1)-S|tep . Pi|
|00001300| 78 65 6c 73 28 44 72 77 | 2c 31 29 3d 50 69 78 65 |xels(Drw|,1)=Pixe|
|00001310| 6c 73 28 44 72 77 2c 31 | 29 2b 53 74 65 70 0d 07 |ls(Drw,1|)+Step..|
|00001320| 3a 22 20 20 20 20 20 20 | 20 20 e7 20 a4 4f 6b 54 |:" | . .OkT|
|00001330| 6f 43 6f 6e 74 69 6e 75 | 65 28 44 72 77 29 20 8c |oContinu|e(Drw) .|
|00001340| 0d 07 44 15 20 20 20 20 | 20 20 20 20 20 20 20 e6 |..D. | .|
|00001350| 20 63 70 6f 69 0d 07 4e | 3a 20 20 20 20 20 20 20 | cpoi..N|: |
|00001360| 20 20 20 20 50 69 78 65 | 6c 73 28 44 72 77 2c 32 | Pixe|ls(Drw,2|
|00001370| 29 3d b0 50 69 78 65 6c | 73 28 44 72 77 2c 30 29 |)=.Pixel|s(Drw,0)|
|00001380| 2c 50 69 78 65 6c 73 28 | 44 72 77 2c 31 29 29 0d |,Pixels(|Drw,1)).|
|00001390| 07 58 3a 20 20 20 20 20 | 20 20 20 20 20 20 c8 93 |.X: | ..|
|000013a0| 20 c8 90 20 50 69 78 65 | 6c 73 28 44 72 77 2c 30 | .. Pixe|ls(Drw,0|
|000013b0| 29 2c 50 69 78 65 6c 73 | 28 44 72 77 2c 31 29 2c |),Pixels|(Drw,1),|
|000013c0| 53 69 7a 65 2c 53 69 7a | 65 0d 07 62 0d 20 20 20 |Size,Siz|e..b. |
|000013d0| 20 20 20 20 20 cc 0d 07 | 6c 21 20 20 20 20 20 20 | ...|l! |
|000013e0| 20 20 20 20 20 50 69 78 | 65 6c 73 28 44 72 77 2c | Pix|els(Drw,|
|000013f0| 30 29 3d 2d 39 39 39 0d | 07 76 0d 20 20 20 20 20 |0)=-999.|.v. |
|00001400| 20 20 20 cd 0d 07 80 0c | 20 20 20 20 ed 20 44 6f | .....| . Do|
|00001410| 0d 07 8a 05 e1 0d 07 94 | 04 0d 07 9e 18 dd 20 a4 |........|...... .|
|00001420| 4f 6b 54 6f 43 6f 6e 74 | 69 6e 75 65 28 57 68 69 |OkToCont|inue(Whi|
|00001430| 29 0d 07 a8 0d 20 20 20 | 20 52 65 73 3d b9 0d 07 |).... | Res=...|
|00001440| b2 73 20 20 20 20 e7 20 | 50 69 78 65 6c 73 28 57 |.s . |Pixels(W|
|00001450| 68 69 2c 30 29 3e 3d 6d | 78 2d 53 74 65 70 20 80 |hi,0)>=m|x-Step .|
|00001460| 20 50 69 78 65 6c 73 28 | 57 68 69 2c 30 29 3c 3d | Pixels(|Whi,0)<=|
|00001470| 6d 78 2b 53 74 65 70 20 | 80 20 50 69 78 65 6c 73 |mx+Step |. Pixels|
|00001480| 28 57 68 69 2c 31 29 3e | 3d 6d 79 2d 53 74 65 70 |(Whi,1)>|=my-Step|
|00001490| 20 80 20 50 69 78 65 6c | 73 28 57 68 69 2c 31 29 | . Pixel|s(Whi,1)|
|000014a0| 3c 3d 6d 79 2b 53 74 65 | 70 20 8c 20 52 65 73 3d |<=my+Ste|p . Res=|
|000014b0| a3 0d 07 bc 21 20 20 20 | 20 44 69 66 66 58 3d 94 |....! | DiffX=.|
|000014c0| 28 50 69 78 65 6c 73 28 | 57 68 69 2c 30 29 2d 6d |(Pixels(|Whi,0)-m|
|000014d0| 78 29 0d 07 c6 21 20 20 | 20 20 44 69 66 66 59 3d |x)...! | DiffY=|
|000014e0| 94 28 50 69 78 65 6c 73 | 28 57 68 69 2c 31 29 2d |.(Pixels|(Whi,1)-|
|000014f0| 6d 79 29 0d 07 d0 3c 20 | 20 20 20 e7 20 63 70 6f |my)...< | . cpo|
|00001500| 69 3d 30 20 84 20 28 44 | 69 66 66 58 3e 28 53 75 |i=0 . (D|iffX>(Su|
|00001510| 63 6b 2a 35 29 20 84 20 | 44 69 66 66 59 3e 28 53 |ck*5) . |DiffY>(S|
|00001520| 75 63 6b 2a 35 29 29 20 | 8c 20 52 65 73 3d a3 0d |uck*5)) |. Res=..|
|00001530| 07 da 04 0d 07 e4 08 3d | 52 65 73 0d 07 ee 04 0d |.......=|Res.....|
|00001540| 07 f8 1c dd 20 f2 41 64 | 64 4e 65 77 53 75 63 6b |.... .Ad|dNewSuck|
|00001550| 28 53 75 63 6b 54 6f 41 | 64 64 29 0d 08 02 17 20 |(SuckToA|dd).... |
|00001560| 20 20 20 74 68 65 74 61 | 3d b2 28 b3 28 33 36 30 | theta|=.(.(360|
|00001570| 29 29 0d 08 0c 1e 20 20 | 20 20 6c 6e 78 3d b3 28 |)).... | lnx=.(|
|00001580| 53 75 63 6b 2a 34 29 2d | 28 53 75 63 6b 2a 32 29 |Suck*4)-|(Suck*2)|
|00001590| 0d 08 16 1e 20 20 20 20 | 6c 6e 79 3d b3 28 53 75 |.... |lny=.(Su|
|000015a0| 63 6b 2a 34 29 2d 28 53 | 75 63 6b 2a 32 29 0d 08 |ck*4)-(S|uck*2)..|
|000015b0| 20 18 20 20 20 20 61 64 | 78 3d b5 28 74 68 65 74 | . ad|x=.(thet|
|000015c0| 61 29 2a 6c 6e 78 0d 08 | 2a 18 20 20 20 20 61 64 |a)*lnx..|*. ad|
|000015d0| 79 3d 9b 28 74 68 65 74 | 61 29 2a 6c 6e 79 0d 08 |y=.(thet|a)*lny..|
|000015e0| 34 22 20 20 20 20 50 69 | 78 65 6c 73 28 53 75 63 |4" Pi|xels(Suc|
|000015f0| 6b 54 6f 41 64 64 2c 30 | 29 3d 6d 78 2b 61 64 78 |kToAdd,0|)=mx+adx|
|00001600| 0d 08 3e 22 20 20 20 20 | 50 69 78 65 6c 73 28 53 |..>" |Pixels(S|
|00001610| 75 63 6b 54 6f 41 64 64 | 2c 31 29 3d 6d 79 2b 61 |uckToAdd|,1)=my+a|
|00001620| 64 79 0d 08 48 1d 20 20 | 20 20 50 69 78 65 6c 73 |dy..H. | Pixels|
|00001630| 28 53 75 63 6b 54 6f 41 | 64 64 2c 32 29 3d 30 0d |(SuckToA|dd,2)=0.|
|00001640| 08 52 19 20 20 20 20 e3 | 20 43 68 6b 3d 31 20 b8 |.R. .| Chk=1 .|
|00001650| 20 4d 61 78 53 75 63 6b | 0d 08 5c 66 20 20 20 20 | MaxSuck|..\f |
|00001660| 20 20 20 20 e7 20 50 69 | 78 65 6c 73 28 43 68 6b | . Pi|xels(Chk|
|00001670| 2c 30 29 3d 50 69 78 65 | 6c 73 28 53 75 63 6b 54 |,0)=Pixe|ls(SuckT|
|00001680| 6f 41 64 64 2c 30 29 20 | 80 20 50 69 78 65 6c 73 |oAdd,0) |. Pixels|
|00001690| 28 43 68 6b 2c 31 29 3d | 50 69 78 65 6c 73 28 53 |(Chk,1)=|Pixels(S|
|000016a0| 75 63 6b 54 6f 41 64 64 | 2c 31 29 20 80 20 43 68 |uckToAdd|,1) . Ch|
|000016b0| 6b 3c 3e 53 75 63 6b 54 | 6f 41 64 64 20 8c 0d 08 |k<>SuckT|oAdd ...|
|000016c0| 66 33 20 20 20 20 20 20 | 20 20 20 20 20 50 69 78 |f3 | Pix|
|000016d0| 65 6c 73 28 53 75 63 6b | 54 6f 41 64 64 2c 30 29 |els(Suck|ToAdd,0)|
|000016e0| 3d 2d 39 39 39 3a 43 68 | 6b 3d 4d 61 78 53 75 63 |=-999:Ch|k=MaxSuc|
|000016f0| 6b 0d 08 70 0d 20 20 20 | 20 20 20 20 20 cd 0d 08 |k..p. | ...|
|00001700| 7a 0d 20 20 20 20 ed 20 | 43 68 6b 0d 08 84 05 e1 |z. . |Chk.....|
|00001710| 0d 08 8e 04 0d 08 98 12 | dd 20 f2 4d 65 6e 75 28 |........|. .Menu(|
|00001720| 42 6c 6f 63 6b 29 0d 08 | a2 15 20 20 20 20 c8 8e |Block)..|.. ..|
|00001730| 20 42 6c 6f 63 6b 21 31 | 32 20 ca 0d 08 ac 3b 20 | Block!1|2 ....; |
|00001740| 20 20 20 20 20 20 20 20 | c9 20 2d 32 20 3a 20 f2 | |. -2 : .|
|00001750| 64 72 61 77 4d 65 6e 75 | 28 31 2c 22 56 61 63 75 |drawMenu|(1,"Vacu|
|00001760| 75 6d 2c 49 6e 66 6f 2c | 4f 70 74 69 6f 6e 73 2c |um,Info,|Options,|
|00001770| 51 75 69 74 22 29 0d 08 | b6 40 20 20 20 20 20 20 |Quit")..|.@ |
|00001780| 20 20 20 20 20 20 20 20 | 20 20 20 3a c8 99 20 22 | | :.. "|
|00001790| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|000017a0| 2c 2c 4d 65 6e 75 2b 34 | 2c 21 42 6c 6f 63 6b 2d |,,Menu+4|,!Block-|
|000017b0| 36 34 2c 31 37 36 0d 08 | c0 09 20 20 20 20 cb 0d |64,176..|.. ..|
|000017c0| 08 ca 05 e1 0d 08 d4 04 | 0d 08 de 1d dd 20 f2 64 |........|..... .d|
|000017d0| 72 61 77 4d 65 6e 75 28 | 48 61 6e 64 6c 65 2c 4d |rawMenu(|Handle,M|
|000017e0| 65 6e 75 24 29 0d 08 e8 | 14 20 20 20 20 21 4d 65 |enu$)...|. !Me|
|000017f0| 6e 75 3d 48 61 6e 64 6c | 65 0d 08 f2 35 20 20 20 |nu=Handl|e...5 |
|00001800| 20 4d 65 6e 75 3f 31 36 | 3d 37 20 3a 20 4d 65 6e | Menu?16|=7 : Men|
|00001810| 75 3f 31 37 3d 32 20 3a | 20 4d 65 6e 75 3f 31 38 |u?17=2 :| Menu?18|
|00001820| 3d 37 20 3a 20 4d 65 6e | 75 3f 31 39 3d 30 0d 08 |=7 : Men|u?19=0..|
|00001830| fc 2c 20 20 20 20 4d 65 | 6e 75 21 32 30 3d 31 35 |., Me|nu!20=15|
|00001840| 36 20 3a 20 4d 65 6e 75 | 21 32 34 3d 34 30 20 3a |6 : Menu|!24=40 :|
|00001850| 20 4d 65 6e 75 21 32 38 | 3d 30 0d 09 06 13 20 20 | Menu!28|=0.... |
|00001860| 20 20 70 74 72 3d 4d 65 | 6e 75 2b 33 32 0d 09 10 | ptr=Me|nu+32...|
|00001870| 27 20 20 20 20 24 28 4d | 65 6e 75 2b 34 29 3d c0 |' $(M|enu+4)=.|
|00001880| 4d 65 6e 75 24 2c a7 4d | 65 6e 75 24 2c 22 2c 22 |Menu$,.M|enu$,","|
|00001890| 29 2d 31 29 0d 09 1a 12 | 20 20 20 20 4d 65 6e 75 |)-1)....| Menu|
|000018a0| 24 2b 3d 22 2c 22 0d 09 | 24 14 20 20 20 20 c8 95 |$+=","..|$. ..|
|000018b0| 20 4d 65 6e 75 24 3c 3e | 22 22 0d 09 2e 29 20 20 | Menu$<>|""...) |
|000018c0| 20 20 20 20 20 20 20 20 | 4d 65 6e 75 24 3d c1 4d | |Menu$=.M|
|000018d0| 65 6e 75 24 2c a7 4d 65 | 6e 75 24 2c 22 2c 22 29 |enu$,.Me|nu$,",")|
|000018e0| 2b 31 29 0d 09 38 1b 20 | 20 20 20 20 20 20 20 20 |+1)..8. | |
|000018f0| 20 e7 20 4d 65 6e 75 24 | 3c 3e 22 22 20 8c 0d 09 | . Menu$|<>"" ...|
|00001900| 42 33 20 20 20 20 20 20 | 20 20 20 20 20 20 20 21 |B3 | !|
|00001910| 70 74 72 3d 30 20 3a 20 | 70 74 72 21 34 3d 2d 31 |ptr=0 : |ptr!4=-1|
|00001920| 20 3a 20 70 74 72 21 38 | 3d 26 37 30 30 30 30 32 | : ptr!8|=&700002|
|00001930| 31 0d 09 4c 30 20 20 20 | 20 20 20 20 20 20 20 20 |1..L0 | |
|00001940| 20 20 24 28 70 74 72 2b | 31 32 29 3d c0 4d 65 6e | $(ptr+|12)=.Men|
|00001950| 75 24 2c a7 4d 65 6e 75 | 24 2c 22 2c 22 29 2d 31 |u$,.Menu|$,",")-1|
|00001960| 29 0d 09 56 1f 20 20 20 | 20 20 20 20 20 20 20 20 |)..V. | |
|00001970| 20 20 c8 8e 20 c0 4d 65 | 6e 75 24 2c 34 29 20 ca | .. .Me|nu$,4) .|
|00001980| 0d 09 60 2c 20 20 20 20 | 20 20 20 20 20 20 20 20 |..`, | |
|00001990| 20 20 20 20 20 20 c9 20 | 22 49 6e 66 6f 22 20 3a | . |"Info" :|
|000019a0| 20 70 74 72 21 34 3d 49 | 6e 66 6f 25 0d 09 6a 12 | ptr!4=I|nfo%..j.|
|000019b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 cb 0d 09 | | ...|
|000019c0| 74 18 20 20 20 20 20 20 | 20 20 20 20 20 20 20 70 |t. | p|
|000019d0| 74 72 2b 3d 32 34 0d 09 | 7e 0f 20 20 20 20 20 20 |tr+=24..|~. |
|000019e0| 20 20 20 20 cd 0d 09 88 | 09 20 20 20 20 ce 0d 09 | ....|. ...|
|000019f0| 92 1d 20 20 20 20 70 74 | 72 21 2d 32 34 3d 70 74 |.. pt|r!-24=pt|
|00001a00| 72 21 2d 32 34 20 84 20 | 26 38 30 0d 09 9c 05 e1 |r!-24 . |&80.....|
|00001a10| 0d 09 a6 04 0d 09 b0 12 | dd 20 a4 50 6f 6c 6c 28 |........|. .Poll(|
|00001a20| 6d 61 73 6b 25 29 0d 09 | ba 15 20 20 20 20 42 6c |mask%)..|.. Bl|
|00001a30| 6f 63 6b 21 30 3d 6d 61 | 73 6b 25 0d 09 c4 23 20 |ock!0=ma|sk%...# |
|00001a40| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 50 6f 6c 6c | .. "W|imp_Poll|
|00001a50| 22 2c 30 2c 42 6c 6f 63 | 6b 20 b8 20 61 25 0d 09 |",0,Bloc|k . a%..|
|00001a60| ce 07 3d 61 25 0d ff | |..=a%.. | |
+--------+-------------------------+-------------------------+--------+--------+
